Option Explicit
Sub B_Sample006()
    Dim myRng As Range
    Set myRng = Range("A1")		'Nxs
    With myRng
        .Clear				'xs檺M
        .Value = "'test"		']wr
        'ǳƨ즹
        MsgBox "xs" & .Address & "" & vbCrLf & _
        "ܦrꬰ" & .Text & vbCrLf & _
        "}YŸ" & .PrefixCharacter & "C"
    End With
    Set myRng = Nothing				'
End Sub
